* casefiddle.c (casify_object): Use SSET.

diff --git a/src/casefiddle.c b/src/casefiddle.c
index 78c3bb2e8c772c80750791ba635c0e5771181ccc..67862365a30d29f90a0d774bc156c8ffc1465d9d 100644 (file)
--- a/src/casefiddle.c
+++ b/src/casefiddle.c
@@ -90,7 +90,7 @@ casify_object (flag, obj)
                  : ! SINGLE_BYTE_CHAR_P (c))
                break;
 
-             SREF (obj, i) = c;
+             SSET (obj, i, c);
              if ((int) flag >= (int) CASE_CAPITALIZE)
                inword = SYNTAX (c) == Sword;
              i++;